home *** CD-ROM | disk | FTP | other *** search
/ Savor the Moment - Entert…ing Without Reservations / Savoe the Moment - Entertaining Without Reservations.iso / pc / Full_In / _SETUP.1 / HOSmovie.dxr / 00003.ls < prev    next >
Encoding:
Text File  |  1999-10-03  |  263 b   |  21 lines
  1. global sc, gTimer
  2.  
  3. on startMovie
  4.   cursor(0)
  5.   set the timeoutLength to 10 * 60 * 60
  6. end
  7.  
  8. on soundchoice me
  9.   if sc = 1 then
  10.     set the soundLevel to 7
  11.     sc = 0
  12.   else
  13.     set the soundLevel to 0
  14.     sc = 1
  15.   end if
  16. end
  17.  
  18. on timeout
  19.   play movie "show.dir"
  20. end
  21.